home *** CD-ROM | disk | FTP | other *** search
/ MacAddict 6 / MacAddict_006_1997_02.iso / Software Updates / LaserWriter 8.4.1 / LaserWriter Disk 3 / APU.CommonRsrc / APU.CommonRsrc.rsrc / TEXT_131.txt < prev    next >
Encoding:
Text File  |  1996-09-11  |  360 b   |  1 lines
  1. statusdict begin statusdict /diskstatus known { systemdict /devformat known { (distinguishesDisks) = /disksPresent 0 def { dup (disk) search { 4 -1 roll devstatus { 0 gt { 9 {pop} repeat 0 get 48 sub 2 exch exp cvi disksPresent add  /disksPresent exch def} {10 {pop} repeat } ifelse } if }  {pop pop} ifelse } 100 string devforall disksPresent = } if } if end